home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The Arcade•
/
Billiard Parlour ••••
/
Billiard Parlour
/
Billiard Parlour.rsrc
/
CODE_7.txt
< prev
next >
Wrap
Text File
|
1986-02-26
|
17KB
|
293 lines
# near model CODE resource
# jump table entries: 880-882 (3 of them)
fn00000000:
00000000 4E56 FFEC link A6, -0x0014
00000004 422E 0008 clr.b [A6 + 0x8]
00000008 4267 clr.w -[A7]
0000000A 486D FBDC pea.l [A5 - 0x424]
0000000E 3F2D FBD4 move.w -[A7], [A5 - 0x42C]
00000012 486E FFF0 pea.l [A6 - 0x10]
00000016 4EAD 008A jsr [A5 + 0x8A /* export_13 */]
0000001A 3D5F FFEC move.w [A6 - 0x14], [A7]+
0000001E 41EE FFF0 lea.l A0, [A6 - 0x10]
00000022 43FA 0024 lea.l A1, [PC + 0x24 /* 00000048, value 0x4150504C 'APPL' */]
00000026 7003 moveq.l D0, 0x03
label00000028:
00000028 B109 cmpm.b [A0]+, [A1]+
0000002A 56C8 FFFC dbne D0, -0x6 /* 00000028 */
0000002E 6614 bne +0x16 /* 00000044 */
00000030 4267 clr.w -[A7]
00000032 3F3C 0138 move.w -[A7], 0x138
00000036 42A7 clr.l -[A7]
00000038 A986 syscall StopAlert
0000003A 3D5F FFEE move.w [A6 - 0x12], [A7]+
0000003E 1D7C 0001 0008 move.b [A6 + 0x8], 0x1
label00000044:
00000044 4E5E unlink A6
00000046 4E75 rts
00000048 4150 chk.w D0, [A0]
0000004A 504C addq.w A4, 8
export_112:
0000004C 4E56 FFF8 link A6, -0x0008
00000050 48E7 0F00 movem.l -[A7], D4,D5,D6,D7
00000054 4EAD 023A jsr [A5 + 0x23A /* export_67 */]
00000058 4EAD 022A jsr [A5 + 0x22A /* export_65 */]
0000005C 4EAD 01EA jsr [A5 + 0x1EA /* export_57 */]
00000060 41ED 01EA lea.l A0, [A5 + 0x1EA /* export_57 */]
00000064 2F08 move.l -[A7], A0
00000066 A9F1 syscall UnloadSeg
00000068 41ED FBDC lea.l A0, [A5 - 0x424]
0000006C 43ED FE42 lea.l A1, [A5 - 0x1BE]
00000070 7010 moveq.l D0, 0x10
label00000072:
00000072 20D9 move.l [A0]+, [A1]+
00000074 5340 subq.w D0, 1
00000076 6EFA bgt -0x4 /* 00000072 */
00000078 3B6D FDBE FBD4 move.w [A5 - 0x42C], [A5 - 0x242]
0000007E 102D FBCD move.b D0, [A5 - 0x433]
00000082 0A00 0001 xori.b D0, 0x1
00000086 670E beq +0x10 /* 00000096 */
00000088 3C2D FBD4 move.w D6, [A5 - 0x42C]
0000008C 4267 clr.w -[A7]
0000008E 4EBA FF70 jsr [PC - 0x90 /* 00000000 */]
00000092 1E1F move.b D7, [A7]+
00000094 6004 bra +0x6 /* 0000009A */
label00000096:
00000096 4246 clr.w D6
00000098 4207 clr.b D7
label0000009A:
0000009A 1A07 move.b D5, D7
0000009C 2007 move.l D0, D7
0000009E 0A00 0001 xori.b D0, 0x1
000000A2 6716 beq +0x18 /* 000000BA */
000000A4 4267 clr.w -[A7]
000000A6 486D FBDC pea.l [A5 - 0x424]
000000AA 3F06 move.w -[A7], D6
000000AC 486D FBDA pea.l [A5 - 0x426]
000000B0 486D FBD6 pea.l [A5 - 0x42A]
000000B4 4EAD 03C2 jsr [A5 + 0x3C2 /* export_116 */]
000000B8 1A1F move.b D5, [A7]+
label000000BA:
000000BA 4EAD 03AA jsr [A5 + 0x3AA /* export_113 */]
000000BE 41ED 03C2 lea.l A0, [A5 + 0x3C2 /* export_116 */]
000000C2 2F08 move.l -[A7], A0
000000C4 A9F1 syscall UnloadSeg
000000C6 41ED 03AA lea.l A0, [A5 + 0x3AA /* export_113 */]
000000CA 2F08 move.l -[A7], A0
000000CC A9F1 syscall UnloadSeg
000000CE 4AAD FBD6 tst.l [A5 - 0x42A]
000000D2 6F48 ble +0x4A /* 0000011C */
000000D4 2005 move.l D0, D5
000000D6 0A00 0001 xori.b D0, 0x1
000000DA 6706 beq +0x8 /* 000000E2 */
000000DC 4EAD 021A jsr [A5 + 0x21A /* export_63 */]
000000E0 603A bra +0x3C /* 0000011C */
label000000E2:
000000E2 486D FBDC pea.l [A5 - 0x424]
000000E6 487A 005A pea.l [PC + 0x5A /* 00000142, value 0x13A4E56 */]
000000EA 4EAD 01AA jsr [A5 + 0x1AA /* export_49 */]
000000EE 101F move.b D0, [A7]+
000000F0 672A beq +0x2C /* 0000011C */
000000F2 2007 move.l D0, D7
000000F4 0A00 0001 xori.b D0, 0x1
000000F8 6722 beq +0x24 /* 0000011C */
000000FA 4267 clr.w -[A7]
000000FC 3F2D FBDA move.w -[A7], [A5 - 0x426]
00000100 4EAD 005A jsr [A5 + 0x5A /* export_7 */]
00000104 381F move.w D4, [A7]+
00000106 4267 clr.w -[A7]
00000108 4267 clr.w -[A7]
0000010A 3F04 move.w -[A7], D4
0000010C 486D FBDC pea.l [A5 - 0x424]
00000110 487A 001E pea.l [PC + 0x1E /* 00000130, value 0x1152756E, pstring "RunSame - FSClose" */]
00000114 4EAD 03B2 jsr [A5 + 0x3B2 /* export_114 */]
00000118 1D5F FFFA move.b [A6 - 0x6], [A7]+
label0000011C:
0000011C 4EAD 01F2 jsr [A5 + 0x1F2 /* export_58 */]
00000120 41ED 01F2 lea.l A0, [A5 + 0x1F2 /* export_58 */]
00000124 2F08 move.l -[A7], A0
00000126 A9F1 syscall UnloadSeg
00000128 4CDF 00F0 movem.l D4,D5,D6,D7, [A7]+
0000012C 4E5E unlink A6
0000012E 4E75 rts
00000130 1152 756E move.b [A0 + 0x756E], [A2]
00000134 5361 subq.w -[A1], 1
00000136 6D65 blt +0x67 /* 0000019D */
00000138 202D 2046 move.l D0, [A5 + 0x2046]
0000013C 5343 subq.w D3, 1
0000013E 6C6F bge +0x71 /* 000001AF */
00000140 7365 moveq.l D1, 0x65
00000142 013A 4E56 btst [PC + 0x4E56 /* 00004F9A, cstring ""<EOF> */], D0
export_111: // at 00000144 (misaligned)
00000146 FFEE .invalid <<F/7/7>>
00000148 48E7 0118 movem.l -[A7], D7,A3,A4
0000014C 486E FFF8 pea.l [A6 - 0x8]
00000150 A874 syscall GetPort
00000152 486E FFFC pea.l [A6 - 0x4]
00000156 A910 syscall GetWMgrPort
00000158 2F2E 000C move.l -[A7], [A6 + 0xC]
0000015C A873 syscall SetPort
0000015E 286E 0008 movea.l A4, [A6 + 0x8]
00000162 206E 000C movea.l A0, [A6 + 0xC]
00000166 224C movea.l A1, A4
00000168 5C89 addq.l A1, 6
0000016A 41E8 0010 lea.l A0, [A0 + 0x10]
0000016E 22D8 move.l [A1]+, [A0]+
00000170 22D8 move.l [A1]+, [A0]+
00000172 486C 0006 pea.l [A4 + 0x6]
00000176 3F3C FFF8 move.w -[A7], 0xFFF8
0000017A 3F3C FFF8 move.w -[A7], 0xFFF8
0000017E A8A9 syscall InsetRect
00000180 302C 0006 move.w D0, [A4 + 0x6]
00000184 5140 subq.w D0, 8
00000186 3940 0006 move.w [A4 + 0x6], D0
0000018A 486C 0006 pea.l [A4 + 0x6]
0000018E A870 syscall LocalToGlobal
00000190 486C 000A pea.l [A4 + 0xA]
00000194 A870 syscall LocalToGlobal
00000196 2F2E FFFC move.l -[A7], [A6 - 0x4]
0000019A A873 syscall SetPort
0000019C 486C 0006 pea.l [A4 + 0x6]
000001A0 A871 syscall GlobalToLocal
000001A2 486C 000A pea.l [A4 + 0xA]
000001A6 A871 syscall GlobalToLocal
000001A8 302C 000C move.w D0, [A4 + 0xC]
000001AC 906C 0008 sub.w D0, [A4 + 0x8]
000001B0 48C0 ext.l D0
000001B2 81FC 0008 divs.w D0, 0x8
000001B6 5240 addq.w D0, 1
000001B8 3940 0004 move.w [A4 + 0x4], D0
000001BC 102C 0005 move.b D0, [A4 + 0x5]
000001C0 0240 0001 andi.w D0, 0x1
000001C4 670A beq +0xC /* 000001D0 */
000001C6 302C 0004 move.w D0, [A4 + 0x4]
000001CA 5240 addq.w D0, 1
000001CC 3940 0004 move.w [A4 + 0x4], D0
label000001D0:
000001D0 302C 000A move.w D0, [A4 + 0xA]
000001D4 906C 0006 sub.w D0, [A4 + 0x6]
000001D8 C1EC 0004 muls.w D0, [A4 + 0x4]
000001DC 48C0 ext.l D0
000001DE 2E00 move.l D7, D0
000001E0 2F07 move.l -[A7], D7
000001E2 4EAD 0122 jsr [A5 + 0x122 /* export_32 */]
000001E6 42A7 clr.l -[A7]
000001E8 2F07 move.l -[A7], D7
000001EA 4EAD 00C2 jsr [A5 + 0xC2 /* export_20 */]
000001EE 265F movea.l A3, [A7]+
000001F0 200B move.l D0, A3
000001F2 6734 beq +0x36 /* 00000228 */
000001F4 2F0B move.l -[A7], A3
000001F6 4EAD 00AA jsr [A5 + 0xAA /* export_17 */]
000001FA 206E 0008 movea.l A0, [A6 + 0x8]
000001FE 2093 move.l [A0], [A3]
00000200 206E FFFC movea.l A0, [A6 - 0x4]
00000204 4868 0002 pea.l [A0 + 0x2]
00000208 2F2E 0008 move.l -[A7], [A6 + 0x8]
0000020C 206E 0008 movea.l A0, [A6 + 0x8]
00000210 4868 0006 pea.l [A0 + 0x6]
00000214 206E 0008 movea.l A0, [A6 + 0x8]
00000218 4868 0006 pea.l [A0 + 0x6]
0000021C 4267 clr.w -[A7]
0000021E 42A7 clr.l -[A7]
00000220 A8EC syscall CopyBits
00000222 2F0B move.l -[A7], A3
00000224 4EAD 00B2 jsr [A5 + 0xB2 /* export_18 */]
label00000228:
00000228 206E 0008 movea.l A0, [A6 + 0x8]
0000022C 208B move.l [A0], A3
0000022E 2F2E FFF8 move.l -[A7], [A6 - 0x8]
00000232 A873 syscall SetPort
00000234 4CDF 1880 movem.l D7,A3,A4, [A7]+
00000238 4E5E unlink A6
0000023A 205F movea.l A0, [A7]+
0000023C 504F addq.w A7, 8
0000023E 4ED0 jmp [A0]
export_110:
00000240 4E56 FFD6 link A6, -0x002A
00000244 48E7 0F18 movem.l -[A7], D4,D5,D6,D7,A3,A4
00000248 206E 0008 movea.l A0, [A6 + 0x8]
0000024C 43EE FFF2 lea.l A1, [A6 - 0xE]
00000250 22D8 move.l [A1]+, [A0]+
00000252 22D8 move.l [A1]+, [A0]+
00000254 22D8 move.l [A1]+, [A0]+
00000256 3290 move.w [A1], [A0]
00000258 4AAE FFF2 tst.l [A6 - 0xE]
0000025C 6700 00D0 beq +0xD2 /* 0000032E */
00000260 2C2E FFF2 move.l D6, [A6 - 0xE]
00000264 2F06 move.l -[A7], D6
00000266 4EAD 00AA jsr [A5 + 0xAA /* export_17 */]
0000026A 2046 movea.l A0, D6
0000026C 2D50 FFF2 move.l [A6 - 0xE], [A0]
00000270 486E FFEA pea.l [A6 - 0x16]
00000274 A874 syscall GetPort
00000276 486E FFEE pea.l [A6 - 0x12]
0000027A A910 syscall GetWMgrPort
0000027C 2F2E FFEE move.l -[A7], [A6 - 0x12]
00000280 A873 syscall SetPort
00000282 42A7 clr.l -[A7]
00000284 A8D8 syscall NewRgn
00000286 2E1F move.l D7, [A7]+
00000288 2F07 move.l -[A7], D7
0000028A 486E FFF8 pea.l [A6 - 0x8]
0000028E A8DF syscall RectRgn
00000290 286E FFEE movea.l A4, [A6 - 0x12]
00000294 282C 001C move.l D4, [A4 + 0x1C]
00000298 2A2C 0018 move.l D5, [A4 + 0x18]
0000029C 2947 0018 move.l [A4 + 0x18], D7
000002A0 2947 001C move.l [A4 + 0x1C], D7
000002A4 486E FFF2 pea.l [A6 - 0xE]
000002A8 206E FFEE movea.l A0, [A6 - 0x12]
000002AC 4868 0002 pea.l [A0 + 0x2]
000002B0 486E FFF8 pea.l [A6 - 0x8]
000002B4 486E FFF8 pea.l [A6 - 0x8]
000002B8 4267 clr.w -[A7]
000002BA 42A7 clr.l -[A7]
000002BC A8EC syscall CopyBits
000002BE 206E FFEE movea.l A0, [A6 - 0x12]
000002C2 2145 0018 move.l [A0 + 0x18], D5
000002C6 206E FFEE movea.l A0, [A6 - 0x12]
000002CA 2144 001C move.l [A0 + 0x1C], D4
000002CE 2F07 move.l -[A7], D7
000002D0 A8D9 syscall DisposRgn/DisposeRgn
000002D2 2F06 move.l -[A7], D6
000002D4 4EAD 003A jsr [A5 + 0x3A /* export_3 */]
000002D8 486E FFF8 pea.l [A6 - 0x8]
000002DC A870 syscall LocalToGlobal
000002DE 486E FFFC pea.l [A6 - 0x4]
000002E2 A870 syscall LocalToGlobal
000002E4 207C 0000 09D6 movea.l A0, 0x9D6
000002EA 2650 movea.l A3, [A0]
label000002EC:
000002EC 200B move.l D0, A3
000002EE 6738 beq +0x3A /* 00000328 */
000002F0 4267 clr.w -[A7]
000002F2 2F2B 007A move.l -[A7], [A3 + 0x7A]
000002F6 A8E2 syscall EmptyRgn
000002F8 101F move.b D0, [A7]+
000002FA 0A00 0001 xori.b D0, 0x1
000002FE 6722 beq +0x24 /* 00000322 */
00000300 2F0B move.l -[A7], A3
00000302 A873 syscall SetPort
00000304 486E FFF8 pea.l [A6 - 0x8]
00000308 A871 syscall GlobalToLocal
0000030A 486E FFFC pea.l [A6 - 0x4]
0000030E A871 syscall GlobalToLocal
00000310 486E FFF8 pea.l [A6 - 0x8]
00000314 A92A syscall ValidRect
00000316 486E FFF8 pea.l [A6 - 0x8]
0000031A A870 syscall LocalToGlobal
0000031C 486E FFFC pea.l [A6 - 0x4]
00000320 A870 syscall LocalToGlobal
label00000322:
00000322 266B 0090 movea.l A3, [A3 + 0x90]
00000326 60C4 bra -0x3A /* 000002EC */
label00000328:
00000328 2F2E FFEA move.l -[A7], [A6 - 0x16]
0000032C A873 syscall SetPort
label0000032E:
0000032E 4CDF 18F0 movem.l D4,D5,D6,D7,A3,A4, [A7]+
00000332 4E5E unlink A6
00000334 2E9F move.l [A7], [A7]+
00000336 4E75 rts